/*

Amanda Mireles	
Proposal title: Women’s College Advantage and Public Perception of College Value in the Labor Market

HYPOTHESES

Stated-Hyp1: Feminization will lead to labor market devaluation 
of the college degree for both male and female job applicants.
	
	Test-Hyp1: Graduates of the college where women earn more degrees will have a lower liklihood of being interviewed compared to graduates of a college where men earn more degrees.

	Test-Hyp2: Graduates of the college where women earn more degrees will have a lower liklihood of being hired compared to graduates of a college where men earn more degrees.

	Test-Hyp3: Graduates of the college where women earn more degrees will have lower recommended salary compared to graduates of a college where men earn more degrees.
	
Stated-Hyp1: Feminization will lead to greater labor market devaluation 
of the college degree for female job applicants compared to male job applicants.

	Test-Hyp4: Graduates of the college where women earn more degrees will have a lower liklihood of being interviewed compared to graduates of a college where men earn more degrees, but this effect will be stronger for women graduates.

	Test-Hyp5: Graduates of the college where women earn more degrees will have a lower liklihood of being hired compared to graduates of a college where men earn more degrees, but this effect will be stronger for women graduates.

	Test-Hyp6: Graduates of the college where women earn more degrees will have lower recommended salary compared to graduates of a college where men earn more degrees, but this effect will be stronger for women graduates.
	
	
*/

clear all
use "Mireles1019.dta", clear

********************************************************************************

* CONSTRUCT INDICATORS OF EXPERIMENTAL MANIPULATIONS
	
* Treatment 1: gender trend in bachelors degrees awarded
	/* measure of feminization of college degree */

	lab def feminized 1 "women earn more degrees" 0 "men earn more degrees"
	recode P_AAM02 (1=1) (2=0), gen(feminized)
	lab val feminized feminized
	tab feminized
	
* Treatment 2: applicant gender
	recode P_AAM05 (1=1) (2=0), gen (female_applicant)
	tab female_applicant
	
* OUTCOME MEASURES
	
	* likelihood of calling applicant for interview
		* higher values represent devaluation
	clonevar eval_interview = AAM06
	
	* likelihood of hiring candidate
		* higher values represent devaluation
	clonevar eval_hire = AAM07

	* clean missing data
	foreach var of varlist eval* {
	replace `var'=. if `var' >=77
	tab `var'
	}
	
	
	* salary recommended
	clonevar salary_rec= AAM08
	replace salary_rec=. if AAM08>=777777
	tab salary_rec, mis


	
********************************************************************************

* ANALYSIS

	// note: bonferroni correction needed: each treatment is tested for 3 outcomes
	di .05/3 // test threshold is 0.0167

	*Test-Hyp1: Graduates of the college where women earn more degrees will have a lower liklihood of being interviewed compared to graduates of a college where men earn more degrees.

	reg eval_interview i.feminized
	// reject. p=0.269
	tess 1.feminized -, init(Mireles1019) bonf(3)
	
	*Test-Hyp2: Graduates of the college where women earn more degrees will have a lower liklihood of being hired compared to graduates of a college where men earn more degrees.

	reg eval_hire i.feminized
	// reject. p=0.122
	tess 1.feminized -, bonf(3)
	
	*Test-Hyp3: Graduates of the college where women earn more degrees will have lower recommended salary compared to graduates of a college where men earn more degrees.
	
	reg salary_rec i.feminized
	// reject. p=0.767
	tess 1.feminized -, bonf(3)
	
	*Test-Hyp4: Graduates of the college where women earn more degrees will have a lower liklihood of being interviewed compared to graduates of a college where men earn more degrees, but this effect will be stronger for women graduates.

	reg eval_interview i.feminized##i.female_applicant
	// reject. p=0.509
	tess 1.feminized#1.female_applicant -, bonf(3)
	
	*Test-Hyp5: Graduates of the college where women earn more degrees will have a lower liklihood of being hired compared to graduates of a college where men earn more degrees, but this effect will be stronger for women graduates.
	
	reg eval_hire i.feminized##i.female_applicant
	// reject. p=0.986
	tess 1.feminized#1.female_applicant -, bonf(3)
	*Test-Hyp6: Graduates of the college where women earn more degrees will have lower recommended salary compared to graduates of a college where men earn more degrees, but this effect will be stronger for women graduates.
	
	reg salary_rec i.feminized##i.female_applicant
	// reject. p=0.999
	tess 1.feminized#1.female_applicant -, bonf(3)	
